R语言 导入某文件夹内的所有EXCEL文件/chatGPT镜像网址分享

介绍

本文介绍使用readxl包和for循环实现excel的批量导入和命名。

正文部分

代码实现

## Target: R语言导入某路径下的所有excel文件
## Time: 2024/03/14
## Author: xiaohe
## Notes: zhenzhen

## 清空历史环境变量
rm(list = ls())

## 设置文件夹路径（我的文件夹在桌面的data）
folder_path<-"C:/Users/Desktop/data"

## R包加载
library(readxl)

## 获取该文件夹内所有excel文件名
file_paths<-list.files(path = folder_path, pattern = "\\.xlsx$", full.names = TRUE)

## 导入每个excel文件并命名数据框
for (i in seq_along(file_paths)) {
  file <- file_paths[i]
  assign(paste0("df", i), read_excel(file))
}

代码解释

pattern="\\.xlsx$"
# 该参数用于筛选文件的正则表达式模式
# .表示匹配任意字符   \\.表示匹配实际的.

full.names=TRUE
# 该参数指示list.files()函数返回完整的文件路径

seq_along(file_paths)
# 生成一个与file_paths长度相同的序列

assign(paste0("df", i),read_excel(file))
# assign()函数用于创建一个新变量,并将读取的Excel文件内容存储到这个变量中
# paste0("df",i)生成变量名,由于i的取值不同,会依次生成df1,df2,df3,df4......
# read_excel()函数读取excel文件内容

---

备注1

在R语言学习过程中会常遇到报错问题，为提高学习效率，分享几个chatGPT镜像网址，可在本公众号对话框回复关键词【chatGPT镜像】获取。侵权删 

---

备注2

大家有兴趣可加群，欢迎交流学习，共同进步！

若群链接失效，可在本公众号内的对话框回复关键词【R语言学习交流群】

直接扫码进群

欢迎扫码添加本人

---

若您觉得本文有帮助，帮忙点击点赞和在看是对我最大的鼓励和支持！

---